#include <iostream>

using namespace std;
typedef long long ll;
const int N=1e7+10;


int prime[N],cnt;
int st[N];
int phi[N];
ll s[N];
void init(int n)
{
	for(int i=2;i<=n;i++)
	{
		if(!st[i])
		{
			prime[cnt++]=i;
			phi[i]=i-1;
		}
		for(int j=0;prime[j]<=n/i && j<cnt;j++)
		{
			st[prime[j]*i]=true;
			if(i%prime[j]==0)
			{
				phi[prime[j]*i]=phi[i]*prime[j];
				break;
			}
			phi[prime[j]*i]=phi[i]*(prime[j]-1);
		}
	}
	for(int i=1;i<=n;i++)
	{
		s[i]=s[i-1]+phi[i];
	}
}
int main()
{
	int n;
	cin>>n;
	init(n);
	ll ret=0;
	for(int i=0;prime[i]<=n && i<cnt;i++)
	{	
		ret+=s[n/prime[i]]*2+1;
	}

	cout<<ret<<endl;
	return 0;
}
